﻿Imports Infragistics.Win.UltraWinGrid
Imports Infragistics.Win
Imports Infragistics
Imports Infragistics.Win.UltraWinEditors

Public Class IUltraComBoEditor
    Inherits UltraComboEditor
    Dim utg As UltraGrid
    Dim DropDownEditorButton1 As Infragistics.Win.UltraWinEditors.DropDownEditorButton = New Infragistics.Win.UltraWinEditors.DropDownEditorButton()
    ''' <summary>
    ''' thêm iultragrid vào để có thể thao tác với menustrip liên quan tới bảng khác 
    ''' </summary>
    ''' <param name="utg"></param>
    ''' <remarks></remarks>
    Public Sub setThemUltraGrid(ByVal utg As UltraGrid)
        Me.utg = utg
        Dim Appearance19 As Infragistics.Win.Appearance = New Infragistics.Win.Appearance()
        Appearance19.Image = My.Resources.add_16
        Appearance19.ImageHAlign = Infragistics.Win.HAlign.Left
        DropDownEditorButton1.Appearance = Appearance19
        Me.DropDownEditorButton1.Control = utg
        DropDownEditorButton1.PreferredDropDownSize = New System.Drawing.Size(0, 0)
        Me.ButtonsLeft.Add(DropDownEditorButton1)
        Me.Location = New System.Drawing.Point(571, 12)
        Me.Size = New System.Drawing.Size(144, 21)
        Me.TabIndex = 4
        Me.Text = ""
    End Sub
End Class
